home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / toolwin.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-02-09  |  2.3 KB  |  67 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'ToolWin.pas' rev: 3.00
  6.  
  7. #ifndef ToolWinHPP
  8. #define ToolWinHPP
  9. #include <Forms.hpp>
  10. #include <Controls.hpp>
  11. #include <Classes.hpp>
  12. #include <Messages.hpp>
  13. #include <Windows.hpp>
  14. #include <SysInit.hpp>
  15. #include <System.hpp>
  16.  
  17. //-- user supplied -----------------------------------------------------------
  18.  
  19. namespace Toolwin
  20. {
  21. //-- type declarations -------------------------------------------------------
  22. enum TEdgeBorder { ebLeft, ebTop, ebRight, ebBottom };
  23.  
  24. typedef Set<TEdgeBorder, ebLeft, ebBottom>  TEdgeBorders;
  25.  
  26. enum TEdgeStyle { esNone, esRaised, esLowered };
  27.  
  28. class DELPHICLASS TToolWindow;
  29. class PASCALIMPLEMENTATION TToolWindow : public Controls::TWinControl 
  30. {
  31.     typedef Controls::TWinControl inherited;
  32.     
  33. private:
  34.     int FBorderWidth;
  35.     TEdgeBorders FEdgeBorders;
  36.     TEdgeStyle FEdgeInner;
  37.     TEdgeStyle FEdgeOuter;
  38.     void __fastcall SetBorderWidth(int Value);
  39.     void __fastcall SetEdgeBorders(TEdgeBorders Value);
  40.     void __fastcall SetEdgeInner(TEdgeStyle Value);
  41.     void __fastcall SetEdgeOuter(TEdgeStyle Value);
  42.     MESSAGE void __fastcall WMNCCalcSize(Messages::TWMNCCalcSize &Message);
  43.     MESSAGE void __fastcall WMNCPaint(Messages::TMessage &Message);
  44.     HIDESBASE MESSAGE void __fastcall CMCtl3DChanged(Messages::TMessage &Message);
  45.     
  46. public:
  47.     __fastcall virtual TToolWindow(Classes::TComponent* AOwner);
  48.     __property int BorderWidth = {read=FBorderWidth, write=SetBorderWidth, default=0};
  49.     __property TEdgeBorders EdgeBorders = {read=FEdgeBorders, write=SetEdgeBorders, default=15};
  50.     __property TEdgeStyle EdgeInner = {read=FEdgeInner, write=SetEdgeInner, default=1};
  51.     __property TEdgeStyle EdgeOuter = {read=FEdgeOuter, write=SetEdgeOuter, default=2};
  52. public:
  53.     /* TWinControl.CreateParented */ __fastcall TToolWindow(HWND ParentWindow) : Controls::TWinControl(
  54.         ParentWindow) { }
  55.     /* TWinControl.Destroy */ __fastcall virtual ~TToolWindow(void) { }
  56.     
  57. };
  58.  
  59. //-- var, const, procedure ---------------------------------------------------
  60.  
  61. }    /* namespace Toolwin */
  62. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  63. using namespace Toolwin;
  64. #endif
  65. //-- end unit ----------------------------------------------------------------
  66. #endif    // ToolWin
  67.